inherited frmCadPropriedade: TfrmCadPropriedade
  Left = 299
  Top = 0
  Width = 820
  Height = 668
  Caption = 'Cadastro de Propriedades'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited pgcCadastro: TcxPageControl
    Width = 812
    Height = 615
    ActivePage = tbsEdita
    ClientRectBottom = 610
    ClientRectRight = 807
    inherited tbsLista: TcxTabSheet
      inherited Grid: TcxGrid
        Width = 802
        Height = 565
        inherited GridDBBandedTableView2: TcxGridDBBandedTableView
          object GridDBBandedTableView2P_NOME: TcxGridDBBandedColumn
            DataBinding.FieldName = 'P_NOME'
            Position.BandIndex = 0
            Position.ColIndex = 0
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2CODIGO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'CODIGO'
            Position.BandIndex = 0
            Position.ColIndex = 1
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2NOME: TcxGridDBBandedColumn
            DataBinding.FieldName = 'NOME'
            Position.BandIndex = 0
            Position.ColIndex = 2
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2CIDADE: TcxGridDBBandedColumn
            DataBinding.FieldName = 'CIDADE'
            Position.BandIndex = 0
            Position.ColIndex = 3
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2PRODUTOR: TcxGridDBBandedColumn
            DataBinding.FieldName = 'PRODUTOR'
            Position.BandIndex = 0
            Position.ColIndex = 4
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2COMPLEMENTO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'COMPLEMENTO'
            Position.BandIndex = 0
            Position.ColIndex = 5
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2N_CPR: TcxGridDBBandedColumn
            DataBinding.FieldName = 'N_CPR'
            Position.BandIndex = 0
            Position.ColIndex = 6
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2INSC_IAGRO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'INSC_IAGRO'
            Position.BandIndex = 0
            Position.ColIndex = 7
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2INCRA: TcxGridDBBandedColumn
            DataBinding.FieldName = 'INCRA'
            Position.BandIndex = 0
            Position.ColIndex = 8
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2CRC_CONTADOR: TcxGridDBBandedColumn
            DataBinding.FieldName = 'CRC_CONTADOR'
            Position.BandIndex = 0
            Position.ColIndex = 9
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2CAFIR: TcxGridDBBandedColumn
            DataBinding.FieldName = 'CAFIR'
            Position.BandIndex = 0
            Position.ColIndex = 10
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2R_MAT: TcxGridDBBandedColumn
            DataBinding.FieldName = 'R_MAT'
            Position.BandIndex = 0
            Position.ColIndex = 11
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2INSC_ESTADUAL: TcxGridDBBandedColumn
            DataBinding.FieldName = 'INSC_ESTADUAL'
            Position.BandIndex = 0
            Position.ColIndex = 12
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2EXPORT_MIC: TcxGridDBBandedColumn
            DataBinding.FieldName = 'EXPORT_MIC'
            Position.BandIndex = 0
            Position.ColIndex = 13
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2COND_PRODUTOR: TcxGridDBBandedColumn
            DataBinding.FieldName = 'COND_PRODUTOR'
            Position.BandIndex = 0
            Position.ColIndex = 14
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2AREA_TOTAL: TcxGridDBBandedColumn
            DataBinding.FieldName = 'AREA_TOTAL'
            Position.BandIndex = 0
            Position.ColIndex = 15
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2AREA_PASTAGEM: TcxGridDBBandedColumn
            DataBinding.FieldName = 'AREA_PASTAGEM'
            Position.BandIndex = 0
            Position.ColIndex = 16
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2AREA_AGRICOLA: TcxGridDBBandedColumn
            DataBinding.FieldName = 'AREA_AGRICOLA'
            Position.BandIndex = 0
            Position.ColIndex = 17
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2OUTRAS_AREAS: TcxGridDBBandedColumn
            DataBinding.FieldName = 'OUTRAS_AREAS'
            Position.BandIndex = 0
            Position.ColIndex = 18
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2AREA_UTILIZADA: TcxGridDBBandedColumn
            DataBinding.FieldName = 'AREA_UTILIZADA'
            Position.BandIndex = 0
            Position.ColIndex = 19
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2ATIVO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'ATIVO'
            Position.BandIndex = 0
            Position.ColIndex = 20
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2DOMICILIO_FISCAL: TcxGridDBBandedColumn
            DataBinding.FieldName = 'DOMICILIO_FISCAL'
            Position.BandIndex = 0
            Position.ColIndex = 21
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2CDD_NOME: TcxGridDBBandedColumn
            DataBinding.FieldName = 'CDD_NOME'
            Position.BandIndex = 0
            Position.ColIndex = 22
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2DC_NOME: TcxGridDBBandedColumn
            DataBinding.FieldName = 'DC_NOME'
            Position.BandIndex = 0
            Position.ColIndex = 23
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2GADO_PRECOCE: TcxGridDBBandedColumn
            DataBinding.FieldName = 'GADO_PRECOCE'
            Position.BandIndex = 0
            Position.ColIndex = 24
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2GADO_REGISTRADO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'GADO_REGISTRADO'
            Position.BandIndex = 0
            Position.ColIndex = 25
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2GADO_LEITEIRO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'GADO_LEITEIRO'
            Position.BandIndex = 0
            Position.ColIndex = 26
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2CAPACIDADE_ARMAZENAMENTO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'CAPACIDADE_ARMAZENAMENTO'
            Position.BandIndex = 0
            Position.ColIndex = 27
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2TIPO_LOGRADOURO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'TIPO_LOGRADOURO'
            Position.BandIndex = 0
            Position.ColIndex = 28
            Position.RowIndex = 0
          end
          object GridDBBandedTableView2TP_LOGRADOURO: TcxGridDBBandedColumn
            DataBinding.FieldName = 'TP_LOGRADOURO'
            Position.BandIndex = 0
            Position.ColIndex = 29
            Position.RowIndex = 0
          end
        end
      end
      inherited Panel1: TPanel
        Width = 802
      end
    end
    inherited tbsEdita: TcxTabSheet
      inherited Panel2: TPanel
        Width = 802
        Height = 582
        object cxDBCheckBox1: TcxDBCheckBox
          Left = 648
          Top = 216
          Caption = 'Ativo'
          DataBinding.DataField = 'ATIVO'
          DataBinding.DataSource = dsRegistro
          Properties.ValueChecked = 'S'
          Properties.ValueGrayed = ''
          Properties.ValueUnchecked = 'N'
          TabOrder = 1
          Width = 57
        end
        object pnlSubCad: TPanel
          Left = 1
          Top = 304
          Width = 800
          Height = 277
          Align = alBottom
          BevelOuter = bvNone
          TabOrder = 2
          object PgcComplementar: TcxPageControl
            Left = 0
            Top = 0
            Width = 800
            Height = 277
            ActivePage = tbsEstInicial
            Align = alClient
            TabOrder = 0
            ClientRectBottom = 272
            ClientRectLeft = 5
            ClientRectRight = 795
            ClientRectTop = 28
            object tbsEstInicial: TcxTabSheet
              Caption = 'Estoques Iniciais'
              ImageIndex = 0
              OnShow = tbsEstInicialShow
              object PGCSub1: TcxPageControl
                Left = 0
                Top = 0
                Width = 790
                Height = 244
                ActivePage = tbsEditaComp1
                Align = alClient
                TabOrder = 0
                ClientRectBottom = 239
                ClientRectLeft = 5
                ClientRectRight = 785
                ClientRectTop = 28
                object tbsListaComp1: TcxTabSheet
                  Caption = 'Pesquisa'
                  ImageIndex = 0
                  OnEnter = tbsListaComp1Enter
                  object GridComp1: TcxGrid
                    Left = 0
                    Top = 0
                    Width = 780
                    Height = 211
                    Align = alClient
                    TabOrder = 0
                    object GridComp1DBTableView1: TcxGridDBTableView
                      NavigatorButtons.ConfirmDelete = False
                      NavigatorButtons.First.Visible = True
                      NavigatorButtons.PriorPage.Visible = True
                      NavigatorButtons.Prior.Visible = True
                      NavigatorButtons.Next.Visible = True
                      NavigatorButtons.NextPage.Visible = True
                      NavigatorButtons.Last.Visible = True
                      NavigatorButtons.Insert.Visible = False
                      NavigatorButtons.Append.Enabled = False
                      NavigatorButtons.Append.Visible = False
                      NavigatorButtons.Delete.Visible = False
                      NavigatorButtons.Edit.Visible = False
                      NavigatorButtons.Post.Visible = False
                      NavigatorButtons.Cancel.Visible = False
                      NavigatorButtons.Refresh.Enabled = False
                      NavigatorButtons.Refresh.Visible = False
                      NavigatorButtons.SaveBookmark.Enabled = False
                      NavigatorButtons.SaveBookmark.Visible = False
                      NavigatorButtons.GotoBookmark.Visible = False
                      NavigatorButtons.Filter.Visible = True
                      DataController.DataSource = dsPesquisaComp1
                      DataController.DetailKeyFieldNames = 'CODIGO'
                      DataController.Summary.DefaultGroupSummaryItems = <>
                      DataController.Summary.FooterSummaryItems = <>
                      DataController.Summary.SummaryGroups = <>
                      OptionsBehavior.IncSearch = True
                      OptionsBehavior.NavigatorHints = True
                      OptionsCustomize.ColumnHiding = True
                      OptionsData.CancelOnExit = False
                      OptionsData.Deleting = False
                      OptionsData.DeletingConfirmation = False
                      OptionsData.Editing = False
                      OptionsData.Inserting = False
                      OptionsSelection.CellSelect = False
                      OptionsSelection.InvertSelect = False
                      OptionsSelection.UnselectFocusedRecordOnExit = False
                      OptionsView.FooterAutoHeight = True
                      OptionsView.GroupByBox = False
                      Preview.Visible = True
                      object GridComp1DBTableView1CODIGO: TcxGridDBColumn
                        DataBinding.FieldName = 'CODIGO'
                      end
                      object GridComp1DBTableView1ANO: TcxGridDBColumn
                        DataBinding.FieldName = 'ANO'
                      end
                      object GridComp1DBTableView1PRODUTO: TcxGridDBColumn
                        DataBinding.FieldName = 'PRODUTO'
                      end
                      object GridComp1DBTableView1PROPRIEDADE: TcxGridDBColumn
                        DataBinding.FieldName = 'PROPRIEDADE'
                      end
                      object GridComp1DBTableView1QTDE: TcxGridDBColumn
                        DataBinding.FieldName = 'QTDE'
                      end
                      object GridComp1DBTableView1PRODUTO_NOME: TcxGridDBColumn
                        DataBinding.FieldName = 'PRODUTO_NOME'
                      end
                    end
                    object GridComp1Level1: TcxGridLevel
                      GridView = GridComp1DBTableView1
                    end
                  end
                end
                object tbsEditaComp1: TcxTabSheet
                  Caption = 'Registro'
                  ImageIndex = 1
                  OnEnter = tbsEditaComp1Enter
                  object cxDBCalcEdit7: TcxDBCalcEdit
                    Left = 475
                    Top = 24
                    DataBinding.DataField = 'QTDE'
                    DataBinding.DataSource = dsRegistroComp1
                    Style.LookAndFeel.Kind = lfOffice11
                    Style.ButtonStyle = btsFlat
                    StyleDisabled.LookAndFeel.Kind = lfOffice11
                    StyleFocused.LookAndFeel.Kind = lfOffice11
                    StyleHot.LookAndFeel.Kind = lfOffice11
                    TabOrder = 2
                    Width = 103
                  end
                  object cxLabel20: TcxLabel
                    Left = 473
                    Top = 8
                    Caption = 'Quantidade'
                    Transparent = True
                  end
                  object cbProduto: TcxDBLookupComboBox
                    Left = 75
                    Top = 24
                    DataBinding.DataField = 'PRODUTO'
                    DataBinding.DataSource = dsRegistroComp1
                    Properties.CharCase = ecUpperCase
                    Properties.KeyFieldNames = 'CODIGO'
                    Properties.ListColumns = <
                      item
                        FieldName = 'NOME'
                      end>
                    Properties.ListSource = dsProdutos
                    TabOrder = 1
                    Width = 375
                  end
                  object btnProduto: TcxButtonEdit
                    Left = 449
                    Top = 24
                    TabStop = False
                    Properties.Buttons = <
                      item
                        Caption = 'F9'
                        Default = True
                        Kind = bkText
                      end>
                    Properties.ViewStyle = vsButtonsOnly
                    TabOrder = 5
                    Text = 'btnProduto'
                    OnClick = btnProdutoClick
                    Width = 25
                  end
                  object cxLabel21: TcxLabel
                    Left = 73
                    Top = 8
                    Caption = 'Produto'
                    Transparent = True
                  end
                  object cxDBSpinEdit1: TcxDBSpinEdit
                    Left = 579
                    Top = 24
                    DataBinding.DataField = 'ANO'
                    DataBinding.DataSource = dsRegistroComp1
                    Properties.MinValue = 2000.000000000000000000
                    TabOrder = 3
                    Width = 79
                  end
                  object cxLabel22: TcxLabel
                    Left = 579
                    Top = 8
                    Caption = 'Ano Base'
                    Transparent = True
                  end
                  object edtCodigoComp1: TcxDBTextEdit
                    Left = 9
                    Top = 24
                    TabStop = False
                    DataBinding.DataField = 'CODIGO'
                    DataBinding.DataSource = dsRegistroComp1
                    Properties.CharCase = ecUpperCase
                    Properties.ReadOnly = True
                    Style.Color = clInactiveBorder
                    TabOrder = 0
                    Width = 65
                  end
                  object cxLabel23: TcxLabel
                    Left = 8
                    Top = 8
                    Caption = 'C'#243'digo'
                    Transparent = True
                  end
                end
              end
            end
            object tbsGadoLeiteiro: TcxTabSheet
              Caption = 'Dados - Gado Leiteiro'
              ImageIndex = 1
              OnShow = tbsGadoLeiteiroShow
              object PGCSub2: TcxPageControl
                Left = 0
                Top = 0
                Width = 790
                Height = 244
                ActivePage = tbsEditaComp2
                Align = alClient
                TabOrder = 0
                ClientRectBottom = 239
                ClientRectLeft = 5
                ClientRectRight = 785
                ClientRectTop = 28
                object tbsListaComp2: TcxTabSheet
                  Caption = 'Pesquisa'
                  ImageIndex = 0
                  OnEnter = tbsListaComp2Enter
                  object GridComp2: TcxGrid
                    Left = 0
                    Top = 0
                    Width = 780
                    Height = 211
                    Align = alClient
                    TabOrder = 0
                    object GridComp2DBTableView1: TcxGridDBTableView
                      NavigatorButtons.ConfirmDelete = False
                      NavigatorButtons.First.Visible = True
                      NavigatorButtons.PriorPage.Visible = True
                      NavigatorButtons.Prior.Visible = True
                      NavigatorButtons.Next.Visible = True
                      NavigatorButtons.NextPage.Visible = True
                      NavigatorButtons.Last.Visible = True
                      NavigatorButtons.Insert.Visible = False
                      NavigatorButtons.Append.Enabled = False
                      NavigatorButtons.Append.Visible = False
                      NavigatorButtons.Delete.Visible = False
                      NavigatorButtons.Edit.Visible = False
                      NavigatorButtons.Post.Visible = False
                      NavigatorButtons.Cancel.Visible = False
                      NavigatorButtons.Refresh.Enabled = False
                      NavigatorButtons.Refresh.Visible = False
                      NavigatorButtons.SaveBookmark.Enabled = False
                      NavigatorButtons.SaveBookmark.Visible = False
                      NavigatorButtons.GotoBookmark.Visible = False
                      NavigatorButtons.Filter.Visible = True
                      DataController.DataSource = dsPesquisaComp2
                      DataController.DetailKeyFieldNames = 'CODIGO'
                      DataController.Summary.DefaultGroupSummaryItems = <>
                      DataController.Summary.FooterSummaryItems = <>
                      DataController.Summary.SummaryGroups = <>
                      OptionsBehavior.IncSearch = True
                      OptionsBehavior.NavigatorHints = True
                      OptionsCustomize.ColumnHiding = True
                      OptionsData.CancelOnExit = False
                      OptionsData.Deleting = False
                      OptionsData.DeletingConfirmation = False
                      OptionsData.Editing = False
                      OptionsData.Inserting = False
                      OptionsSelection.CellSelect = False
                      OptionsSelection.InvertSelect = False
                      OptionsSelection.UnselectFocusedRecordOnExit = False
                      OptionsView.FooterAutoHeight = True
                      OptionsView.GroupByBox = False
                      Preview.Visible = True
                      object GridComp2DBTableView1CODIGO: TcxGridDBColumn
                        DataBinding.FieldName = 'CODIGO'
                      end
                      object GridComp2DBTableView1ANO: TcxGridDBColumn
                        DataBinding.FieldName = 'ANO'
                      end
                      object GridComp2DBTableView1QTDE_VACAS: TcxGridDBColumn
                        DataBinding.FieldName = 'QTDE_VACAS'
                      end
                      object GridComp2DBTableView1QTDE_LEITE_COMERCIALIZADO: TcxGridDBColumn
                        DataBinding.FieldName = 'QTDE_LEITE_COMERCIALIZADO'
                      end
                      object GridComp2DBTableView1PROPRIEDADE: TcxGridDBColumn
                        DataBinding.FieldName = 'PROPRIEDADE'
                      end
                    end
                    object GridComp2Level1: TcxGridLevel
                      GridView = GridComp2DBTableView1
                    end
                  end
                end
                object tbsEditaComp2: TcxTabSheet
                  Caption = 'Registro'
                  ImageIndex = 1
                  OnEnter = tbsEditaComp2Enter
                  object edtCodigoComp2: TcxDBTextEdit
                    Left = 9
                    Top = 24
                    TabStop = False
                    DataBinding.DataField = 'CODIGO'
                    DataBinding.DataSource = dsRegistroComp2
                    Properties.CharCase = ecUpperCase
                    Properties.ReadOnly = True
                    Style.Color = clInactiveBorder
                    TabOrder = 0
                    Width = 65
                  end
                  object cxLabel24: TcxLabel
                    Left = 8
                    Top = 8
                    Caption = 'C'#243'digo'
                    Transparent = True
                  end
                  object cxDBCalcEdit8: TcxDBCalcEdit
                    Left = 155
                    Top = 24
                    DataBinding.DataField = 'QTDE_VACAS'
                    DataBinding.DataSource = dsRegistroComp2
                    Style.LookAndFeel.Kind = lfOffice11
                    Style.ButtonStyle = btsFlat
                    StyleDisabled.LookAndFeel.Kind = lfOffice11
                    StyleFocused.LookAndFeel.Kind = lfOffice11
                    StyleHot.LookAndFeel.Kind = lfOffice11
                    TabOrder = 2
                    Width = 110
                  end
                  object cxLabel25: TcxLabel
                    Left = 153
                    Top = 8
                    Caption = 'Qtde. Vacas Leiteira'
                    Transparent = True
                  end
                  object cxDBSpinEdit2: TcxDBSpinEdit
                    Left = 75
                    Top = 24
                    DataBinding.DataField = 'ANO'
                    DataBinding.DataSource = dsRegistroComp2
                    Properties.MinValue = 2000.000000000000000000
                    TabOrder = 1
                    Width = 79
                  end
                  object cxLabel26: TcxLabel
                    Left = 75
                    Top = 8
                    Caption = 'Ano Base'
                    Transparent = True
                  end
                  object cxDBCalcEdit9: TcxDBCalcEdit
                    Left = 267
                    Top = 24
                    DataBinding.DataField = 'QTDE_LEITE_COMERCIALIZADO'
                    DataBinding.DataSource = dsRegistroComp2
                    Style.LookAndFeel.Kind = lfOffice11
                    Style.ButtonStyle = btsFlat
                    StyleDisabled.LookAndFeel.Kind = lfOffice11
                    StyleFocused.LookAndFeel.Kind = lfOffice11
                    StyleHot.LookAndFeel.Kind = lfOffice11
                    TabOrder = 3
                    Width = 126
                  end
                  object cxLabel27: TcxLabel
                    Left = 265
                    Top = 8
                    Caption = 'Qtde Leite Comercializado'
                    Transparent = True
                  end
                end
              end
            end
            object tbsGadoRegistrado: TcxTabSheet
              Caption = 'Gado Registrado'
              ImageIndex = 2
              OnShow = tbsGadoRegistradoShow
              object PGCSub3: TcxPageControl
                Left = 0
                Top = 0
                Width = 790
                Height = 244
                ActivePage = tbsListaComp3
                Align = alClient
                TabOrder = 0
                ClientRectBottom = 239
                ClientRectLeft = 5
                ClientRectRight = 785
                ClientRectTop = 28
                object tbsListaComp3: TcxTabSheet
                  Caption = 'Pesquisa'
                  ImageIndex = 0
                  OnEnter = tbsListaComp3Enter
                  object GridComp3: TcxGrid
                    Left = 0
                    Top = 0
                    Width = 780
                    Height = 211
                    Align = alClient
                    TabOrder = 0
                    object cxGridDBTableView1: TcxGridDBTableView
                      NavigatorButtons.ConfirmDelete = False
                      NavigatorButtons.First.Visible = True
                      NavigatorButtons.PriorPage.Visible = True
                      NavigatorButtons.Prior.Visible = True
                      NavigatorButtons.Next.Visible = True
                      NavigatorButtons.NextPage.Visible = True
                      NavigatorButtons.Last.Visible = True
                      NavigatorButtons.Insert.Visible = False
                      NavigatorButtons.Append.Enabled = False
                      NavigatorButtons.Append.Visible = False
                      NavigatorButtons.Delete.Visible = False
                      NavigatorButtons.Edit.Visible = False
                      NavigatorButtons.Post.Visible = False
                      NavigatorButtons.Cancel.Visible = False
                      NavigatorButtons.Refresh.Enabled = False
                      NavigatorButtons.Refresh.Visible = False
                      NavigatorButtons.SaveBookmark.Enabled = False
                      NavigatorButtons.SaveBookmark.Visible = False
                      NavigatorButtons.GotoBookmark.Visible = False
                      NavigatorButtons.Filter.Visible = True
                      DataController.DataSource = dsPesquisaComp3
                      DataController.DetailKeyFieldNames = 'CODIGO'
                      DataController.Summary.DefaultGroupSummaryItems = <>
                      DataController.Summary.FooterSummaryItems = <>
                      DataController.Summary.SummaryGroups = <>
                      OptionsBehavior.IncSearch = True
                      OptionsBehavior.NavigatorHints = True
                      OptionsCustomize.ColumnHiding = True
                      OptionsData.CancelOnExit = False
                      OptionsData.Deleting = False
                      OptionsData.DeletingConfirmation = False
                      OptionsData.Editing = False
                      OptionsData.Inserting = False
                      OptionsSelection.CellSelect = False
                      OptionsSelection.InvertSelect = False
                      OptionsSelection.UnselectFocusedRecordOnExit = False
                      OptionsView.FooterAutoHeight = True
                      OptionsView.GroupByBox = False
                      Preview.Visible = True
                      object cxGridDBTableView1CODIGO: TcxGridDBColumn
                        DataBinding.FieldName = 'CODIGO'
                      end
                      object cxGridDBTableView1ANO: TcxGridDBColumn
                        DataBinding.FieldName = 'ANO'
                      end
                      object cxGridDBTableView1PRODUTO: TcxGridDBColumn
                        DataBinding.FieldName = 'PRODUTO'
                        Width = 88
                      end
                      object cxGridDBTableView1NOME_PRODUTO: TcxGridDBColumn
                        DataBinding.FieldName = 'NOME_PRODUTO'
                        Width = 216
                      end
                      object cxGridDBTableView1QTDE: TcxGridDBColumn
                        DataBinding.FieldName = 'QTDE'
                      end
                      object cxGridDBTableView1PROPRIEDADE: TcxGridDBColumn
                        DataBinding.FieldName = 'PROPRIEDADE'
                        Visible = False
                      end
                    end
                    object cxGridLevel1: TcxGridLevel
                      GridView = cxGridDBTableView1
                    end
                  end
                end
                object tbsEditaComp3: TcxTabSheet
                  Caption = 'Registro'
                  ImageIndex = 1
                  OnEnter = tbsEditaComp3Enter
                  object edtCodigoComp3: TcxDBTextEdit
                    Left = 9
                    Top = 24
                    TabStop = False
                    DataBinding.DataField = 'CODIGO'
                    DataBinding.DataSource = dsRegistroComp3
                    Properties.CharCase = ecUpperCase
                    Properties.ReadOnly = True
                    Style.Color = clInactiveBorder
                    TabOrder = 0
                    Width = 65
                  end
                  object cxLabel28: TcxLabel
                    Left = 8
                    Top = 8
                    Caption = 'C'#243'digo'
                    Transparent = True
                  end
                  object cxDBCalcEdit10: TcxDBCalcEdit
                    Left = 475
                    Top = 24
                    DataBinding.DataField = 'QTDE'
                    DataBinding.DataSource = dsRegistroComp3
                    Style.LookAndFeel.Kind = lfOffice11
                    Style.ButtonStyle = btsFlat
                    StyleDisabled.LookAndFeel.Kind = lfOffice11
                    StyleFocused.LookAndFeel.Kind = lfOffice11
                    StyleHot.LookAndFeel.Kind = lfOffice11
                    TabOrder = 2
                    Width = 110
                  end
                  object cxLabel29: TcxLabel
                    Left = 473
                    Top = 8
                    Caption = 'Qtde. Gado Registrado'
                    Transparent = True
                  end
                  object cxDBSpinEdit3: TcxDBSpinEdit
                    Left = 587
                    Top = 24
                    DataBinding.DataField = 'ANO'
                    DataBinding.DataSource = dsRegistroComp3
                    Properties.MinValue = 2000.000000000000000000
                    TabOrder = 3
                    Width = 79
                  end
                  object cxLabel30: TcxLabel
                    Left = 587
                    Top = 8
                    Caption = 'Ano Base'
                    Transparent = True
                  end
                  object btnProduto2: TcxButtonEdit
                    Left = 449
                    Top = 24
                    TabStop = False
                    Properties.Buttons = <
                      item
                        Caption = 'F9'
                        Default = True
                        Kind = bkText
                      end>
                    Properties.ViewStyle = vsButtonsOnly
                    TabOrder = 4
                    Text = 'btnProduto2'
                    OnClick = btnProduto2Click
                    Width = 25
                  end
                  object cbProduto2: TcxDBLookupComboBox
                    Left = 75
                    Top = 24
                    DataBinding.DataField = 'PRODUTO'
                    DataBinding.DataSource = dsRegistroComp3
                    Properties.CharCase = ecUpperCase
                    Properties.KeyFieldNames = 'CODIGO'
                    Properties.ListColumns = <
                      item
                        FieldName = 'NOME'
                      end>
                    Properties.ListSource = dsProdutos2
                    TabOrder = 1
                    Width = 375
                  end
                  object cxLabel31: TcxLabel
                    Left = 73
                    Top = 8
                    Caption = 'Produto'
                    Transparent = True
                  end
                end
              end
            end
          end
        end
        object pnlRegistro: TPanel
          Left = 1
          Top = 1
          Width = 800
          Height = 303
          Align = alClient
          BevelOuter = bvNone
          TabOrder = 0
          OnEnter = pnlRegistroEnter
          object cxGroupBox2: TcxGroupBox
            Left = 512
            Top = 216
            Caption = 'Par'#226'metros'
            TabOrder = 15
            Height = 65
            Width = 273
            object cxDBCheckBox2: TcxDBCheckBox
              Left = 16
              Top = 16
              Caption = 'Ativo'
              DataBinding.DataField = 'ATIVO'
              DataBinding.DataSource = dsRegistro
              Properties.ValueChecked = 'S'
              Properties.ValueUnchecked = 'N'
              TabOrder = 0
              Transparent = True
              Width = 89
            end
            object cxDBCheckBox3: TcxDBCheckBox
              Left = 128
              Top = 17
              Caption = 'Gado Precoce'
              DataBinding.DataField = 'GADO_PRECOCE'
              DataBinding.DataSource = dsRegistro
              Properties.ValueChecked = 'S'
              Properties.ValueUnchecked = 'N'
              TabOrder = 1
              Transparent = True
              Width = 96
            end
            object cxDBCheckBox4: TcxDBCheckBox
              Left = 128
              Top = 37
              Caption = 'Gado Registrado'
              DataBinding.DataField = 'GADO_REGISTRADO'
              DataBinding.DataSource = dsRegistro
              Properties.ValueChecked = 'S'
              Properties.ValueUnchecked = 'N'
              TabOrder = 2
              Transparent = True
              Width = 104
            end
            object cxDBCheckBox5: TcxDBCheckBox
              Left = 16
              Top = 35
              Caption = 'Gado Leiteiro'
              DataBinding.DataField = 'GADO_LEITEIRO'
              DataBinding.DataSource = dsRegistro
              Properties.ValueChecked = 'S'
              Properties.ValueUnchecked = 'N'
              TabOrder = 3
              Transparent = True
              Width = 89
            end
          end
          object cxGroupBox1: TcxGroupBox
            Left = 5
            Top = 216
            Caption = 'Produ'#231#227'o'
            TabOrder = 14
            Height = 65
            Width = 505
            object cxDBCalcEdit1: TcxDBCalcEdit
              Left = 8
              Top = 32
              DataBinding.DataField = 'AREA_TOTAL'
              DataBinding.DataSource = dsRegistro
              TabOrder = 0
              Width = 78
            end
            object cxLabel13: TcxLabel
              Left = 7
              Top = 16
              Caption = 'Area Total'
              Transparent = True
            end
            object cxDBCalcEdit2: TcxDBCalcEdit
              Left = 88
              Top = 31
              DataBinding.DataField = 'AREA_PASTAGEM'
              DataBinding.DataSource = dsRegistro
              TabOrder = 1
              Width = 78
            end
            object cxLabel14: TcxLabel
              Left = 87
              Top = 15
              Caption = 'Area Pastagem'
              Transparent = True
            end
            object cxDBCalcEdit3: TcxDBCalcEdit
              Left = 169
              Top = 31
              DataBinding.DataField = 'AREA_AGRICOLA'
              DataBinding.DataSource = dsRegistro
              TabOrder = 2
              Width = 78
            end
            object cxLabel15: TcxLabel
              Left = 168
              Top = 15
              Caption = 'Area Agr'#237'cola'
              Transparent = True
            end
            object cxDBCalcEdit4: TcxDBCalcEdit
              Left = 249
              Top = 31
              DataBinding.DataField = 'OUTRAS_AREAS'
              DataBinding.DataSource = dsRegistro
              TabOrder = 3
              Width = 78
            end
            object cxLabel16: TcxLabel
              Left = 250
              Top = 15
              Caption = 'Outras Areas'
              Transparent = True
            end
            object cxDBCalcEdit5: TcxDBCalcEdit
              Left = 333
              Top = 31
              DataBinding.DataField = 'AREA_UTILIZADA'
              DataBinding.DataSource = dsRegistro
              TabOrder = 4
              Width = 78
            end
            object cxLabel17: TcxLabel
              Left = 332
              Top = 15
              Caption = 'Outras Utilizada'
              Transparent = True
            end
            object cxDBCalcEdit6: TcxDBCalcEdit
              Left = 417
              Top = 31
              DataBinding.DataField = 'CAPACIDADE_ARMAZENAMENTO'
              DataBinding.DataSource = dsRegistro
              TabOrder = 10
              Width = 78
            end
            object cxLabel19: TcxLabel
              Left = 417
              Top = 14
              Caption = 'Cap. Silos(TN)'
              Transparent = True
            end
          end
          object btnDomicilio: TcxButtonEdit
            Left = 293
            Top = 188
            Properties.Buttons = <
              item
                Caption = 'F9'
                Default = True
                Kind = bkText
              end>
            Properties.ViewStyle = vsButtonsOnly
            TabOrder = 16
            Text = 'btnLogradouro'
            OnClick = btnDomicilioClick
            Width = 25
          end
          object cbDomicilio: TcxDBLookupComboBox
            Left = 7
            Top = 188
            DataBinding.DataField = 'DOMICILIO_FISCAL'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            Properties.KeyFieldNames = 'CODIGO'
            Properties.ListColumns = <
              item
                FieldName = 'NOME'
              end
              item
                FieldName = 'UF'
              end
              item
                FieldName = 'COD_SEFAZ'
              end>
            Properties.ListSource = dsDcFiscal
            TabOrder = 12
            Width = 287
          end
          object cxLabel18: TcxLabel
            Left = 7
            Top = 172
            Caption = 'Domicilio Fiscal'
            Transparent = True
          end
          object cbProdutor: TcxDBLookupComboBox
            Left = 8
            Top = 148
            DataBinding.DataField = 'PRODUTOR'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            Properties.KeyFieldNames = 'CODIGO'
            Properties.ListColumns = <
              item
                FieldName = 'NOME'
              end>
            Properties.ListSource = dsProdutores
            TabOrder = 10
            Width = 287
          end
          object cxLabel11: TcxLabel
            Left = 8
            Top = 132
            Caption = 'Produtor'
            Transparent = True
          end
          object btnProdutor: TcxButtonEdit
            Left = 294
            Top = 148
            Properties.Buttons = <
              item
                Caption = 'F9'
                Default = True
                Kind = bkText
              end>
            Properties.ViewStyle = vsButtonsOnly
            TabOrder = 19
            Text = 'btnLogradouro'
            OnClick = btnProdutorClick
            Width = 25
          end
          object cbCondicao: TcxDBLookupComboBox
            Left = 320
            Top = 147
            DataBinding.DataField = 'COND_PRODUTOR'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            Properties.KeyFieldNames = 'CODIGO'
            Properties.ListColumns = <
              item
                FieldName = 'NOME'
              end>
            Properties.ListSource = dsCondPropriedade
            TabOrder = 11
            Width = 287
          end
          object cxLabel12: TcxLabel
            Left = 320
            Top = 131
            Caption = 'Condi'#231#227'o Propriedade'
            Transparent = True
          end
          object btnCondicao: TcxButtonEdit
            Left = 606
            Top = 147
            Properties.Buttons = <
              item
                Caption = 'F9'
                Default = True
                Kind = bkText
              end>
            Properties.ViewStyle = vsButtonsOnly
            TabOrder = 21
            Text = 'btnLogradouro'
            OnClick = btnCondicaoClick
            Width = 25
          end
          object cxDBTextEdit1: TcxDBTextEdit
            Left = 320
            Top = 108
            DataBinding.DataField = 'COMPLEMENTO'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            TabOrder = 9
            Width = 311
          end
          object cxLabel4: TcxLabel
            Left = 318
            Top = 91
            Caption = 'Endere'#231'o'
            Transparent = True
          end
          object btnCidade: TcxButtonEdit
            Left = 293
            Top = 108
            Properties.Buttons = <
              item
                Caption = 'F9'
                Default = True
                Kind = bkText
              end>
            Properties.ViewStyle = vsButtonsOnly
            TabOrder = 23
            Text = 'btnLogradouro'
            OnClick = btnCidadeClick
            Width = 25
          end
          object cbCidade: TcxDBLookupComboBox
            Left = 7
            Top = 108
            DataBinding.DataField = 'CIDADE'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            Properties.DropDownAutoSize = True
            Properties.KeyFieldNames = 'CODIGO'
            Properties.ListColumns = <
              item
                FieldName = 'NOME'
              end
              item
                FieldName = 'UF'
              end
              item
                FieldName = 'COD_SEFAZ'
              end>
            Properties.ListSource = dsCidades
            TabOrder = 8
            Width = 287
          end
          object cxLabel9: TcxLabel
            Left = 7
            Top = 92
            Caption = 'Cidade'
            Transparent = True
          end
          object cxDBTextEdit2: TcxDBTextEdit
            Left = 7
            Top = 72
            DataBinding.DataField = 'INSC_IAGRO'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            TabOrder = 3
            Width = 142
          end
          object cxLabel5: TcxLabel
            Left = 6
            Top = 55
            Caption = 'Insc. Iagro'
            Transparent = True
          end
          object cxDBTextEdit4: TcxDBTextEdit
            Left = 154
            Top = 72
            DataBinding.DataField = 'INCRA'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            TabOrder = 4
            Width = 142
          end
          object cxLabel6: TcxLabel
            Left = 153
            Top = 55
            Caption = 'Incra'
            Transparent = True
          end
          object cxDBTextEdit5: TcxDBTextEdit
            Left = 301
            Top = 72
            DataBinding.DataField = 'CAFIR'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            TabOrder = 5
            Width = 142
          end
          object cxLabel7: TcxLabel
            Left = 300
            Top = 55
            Caption = 'CAFIR'
            Transparent = True
          end
          object cxDBTextEdit6: TcxDBTextEdit
            Left = 448
            Top = 72
            DataBinding.DataField = 'R_MAT'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            TabOrder = 6
            Width = 142
          end
          object cxLabel8: TcxLabel
            Left = 447
            Top = 55
            Caption = 'R/MAT'
            Transparent = True
          end
          object cxDBTextEdit7: TcxDBTextEdit
            Left = 594
            Top = 72
            DataBinding.DataField = 'CRC_CONTADOR'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            TabOrder = 7
            Width = 191
          end
          object cxLabel10: TcxLabel
            Left = 593
            Top = 55
            Caption = 'CRC Contabilidade'
            Transparent = True
          end
          object edtNome: TcxDBTextEdit
            Left = 570
            Top = 32
            DataBinding.DataField = 'INSC_ESTADUAL'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            TabOrder = 2
            Width = 215
          end
          object cxLabel3: TcxLabel
            Left = 568
            Top = 15
            Caption = 'Insc. Estadual'
            Transparent = True
          end
          object cxDBTextEdit3: TcxDBTextEdit
            Left = 75
            Top = 32
            DataBinding.DataField = 'NOME'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            TabOrder = 1
            Width = 491
          end
          object cxLabel2: TcxLabel
            Left = 73
            Top = 15
            Caption = 'Nome'
            Transparent = True
          end
          object edtCodigo: TcxDBTextEdit
            Left = 7
            Top = 32
            DataBinding.DataField = 'CODIGO'
            DataBinding.DataSource = dsRegistro
            Properties.ReadOnly = True
            Style.Color = clInactiveBorder
            TabOrder = 0
            Width = 65
          end
          object cxLabel1: TcxLabel
            Left = 7
            Top = 15
            Caption = 'C'#243'digo'
            Transparent = True
          end
          object btnAgenfa: TcxButtonEdit
            Left = 606
            Top = 187
            Properties.Buttons = <
              item
                Caption = 'F9'
                Default = True
                Kind = bkText
              end>
            Properties.ViewStyle = vsButtonsOnly
            TabOrder = 33
            Text = 'btnLogradouro'
            OnClick = btnAgenfaClick
            Width = 25
          end
          object cbAgenfa: TcxDBLookupComboBox
            Left = 320
            Top = 187
            DataBinding.DataField = 'AGENFA'
            DataBinding.DataSource = dsRegistro
            Properties.CharCase = ecUpperCase
            Properties.KeyFieldNames = 'CODIGO'
            Properties.ListColumns = <
              item
                FieldName = 'COD_SEFAZ'
              end
              item
                FieldName = 'DESCRICAO'
              end>
            Properties.ListSource = dsAgenfas
            TabOrder = 13
            Width = 287
          end
          object cxLabel32: TcxLabel
            Left = 320
            Top = 171
            Caption = 'Agenfa'
            Transparent = True
          end
          object cxDBImage1: TcxDBImage
            Left = 636
            Top = 97
            DataBinding.DataField = 'MARCA'
            DataBinding.DataSource = dsRegistro
            Properties.Caption = 'Marca '
            Properties.CustomFilter = '*.jpg'
            Properties.GraphicClassName = 'TJPEGImage'
            Properties.Stretch = True
            TabOrder = 35
            Height = 112
            Width = 149
          end
        end
      end
    end
  end
  inherited dsPesquisa: TDataSource
    Left = 291
    Top = 0
  end
  inherited dsRegistro: TDataSource
    Left = 325
    Top = 0
  end
  inherited dtEdit: TIBDataSet
    DeleteSQL.Strings = (
      'delete from propriedade'
      'where'
      '  CODIGO = :OLD_CODIGO')
    InsertSQL.Strings = (
      'insert into propriedade'
      
        '  (AGENFA, AREA_AGRICOLA, AREA_PASTAGEM, AREA_TOTAL, AREA_UTILIZ' +
        'ADA, ATIVO, '
      
        '   CAFIR, CAPACIDADE_ARMAZENAMENTO, CIDADE, CODIGO, COMPLEMENTO,' +
        ' COND_PRODUTOR, '
      
        '   CRC_CONTADOR, DOMICILIO_FISCAL, EXPORT_MIC, GADO_LEITEIRO, GA' +
        'DO_PRECOCE, '
      
        '   GADO_REGISTRADO, INCRA, INSC_ESTADUAL, INSC_IAGRO, MARCA, N_C' +
        'PR, NOME, '
      '   OUTRAS_AREAS, PRODUTOR, R_MAT)'
      'values'
      
        '  (:AGENFA, :AREA_AGRICOLA, :AREA_PASTAGEM, :AREA_TOTAL, :AREA_U' +
        'TILIZADA, '
      
        '   :ATIVO, :CAFIR, :CAPACIDADE_ARMAZENAMENTO, :CIDADE, :CODIGO, ' +
        ':COMPLEMENTO, '
      
        '   :COND_PRODUTOR, :CRC_CONTADOR, :DOMICILIO_FISCAL, :EXPORT_MIC' +
        ', :GADO_LEITEIRO, '
      
        '   :GADO_PRECOCE, :GADO_REGISTRADO, :INCRA, :INSC_ESTADUAL, :INS' +
        'C_IAGRO, '
      '   :MARCA, :N_CPR, :NOME, :OUTRAS_AREAS, :PRODUTOR, :R_MAT)')
    RefreshSQL.Strings = (
      'Select * '
      'from propriedade '
      'where'
      '  CODIGO = :CODIGO')
    SelectSQL.Strings = (
      'select * from propriedade p'
      'where p.codigo = :codigo')
    ModifySQL.Strings = (
      'update propriedade'
      'set'
      '  AGENFA = :AGENFA,'
      '  AREA_AGRICOLA = :AREA_AGRICOLA,'
      '  AREA_PASTAGEM = :AREA_PASTAGEM,'
      '  AREA_TOTAL = :AREA_TOTAL,'
      '  AREA_UTILIZADA = :AREA_UTILIZADA,'
      '  ATIVO = :ATIVO,'
      '  CAFIR = :CAFIR,'
      '  CAPACIDADE_ARMAZENAMENTO = :CAPACIDADE_ARMAZENAMENTO,'
      '  CIDADE = :CIDADE,'
      '  CODIGO = :CODIGO,'
      '  COMPLEMENTO = :COMPLEMENTO,'
      '  COND_PRODUTOR = :COND_PRODUTOR,'
      '  CRC_CONTADOR = :CRC_CONTADOR,'
      '  DOMICILIO_FISCAL = :DOMICILIO_FISCAL,'
      '  EXPORT_MIC = :EXPORT_MIC,'
      '  GADO_LEITEIRO = :GADO_LEITEIRO,'
      '  GADO_PRECOCE = :GADO_PRECOCE,'
      '  GADO_REGISTRADO = :GADO_REGISTRADO,'
      '  INCRA = :INCRA,'
      '  INSC_ESTADUAL = :INSC_ESTADUAL,'
      '  INSC_IAGRO = :INSC_IAGRO,'
      '  MARCA = :MARCA,'
      '  N_CPR = :N_CPR,'
      '  NOME = :NOME,'
      '  OUTRAS_AREAS = :OUTRAS_AREAS,'
      '  PRODUTOR = :PRODUTOR,'
      '  R_MAT = :R_MAT'
      'where'
      '  CODIGO = :OLD_CODIGO')
    GeneratorField.Field = 'CODIGO'
    GeneratorField.Generator = 'GEN_PROPRIEDADE_ID'
    GeneratorField.ApplyEvent = gamOnPost
    Left = 257
    Top = 0
    object dtEditCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"PROPRIEDADE"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtEditNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"PROPRIEDADE"."NOME"'
      Size = 50
    end
    object dtEditCIDADE: TIntegerField
      FieldName = 'CIDADE'
      Origin = '"PROPRIEDADE"."CIDADE"'
    end
    object dtEditPRODUTOR: TIntegerField
      FieldName = 'PRODUTOR'
      Origin = '"PROPRIEDADE"."PRODUTOR"'
    end
    object dtEditCOMPLEMENTO: TIBStringField
      FieldName = 'COMPLEMENTO'
      Origin = '"PROPRIEDADE"."COMPLEMENTO"'
      Size = 50
    end
    object dtEditN_CPR: TIntegerField
      FieldName = 'N_CPR'
      Origin = '"PROPRIEDADE"."N_CPR"'
    end
    object dtEditINSC_IAGRO: TIBStringField
      FieldName = 'INSC_IAGRO'
      Origin = '"PROPRIEDADE"."INSC_IAGRO"'
    end
    object dtEditINCRA: TIBStringField
      FieldName = 'INCRA'
      Origin = '"PROPRIEDADE"."INCRA"'
    end
    object dtEditCRC_CONTADOR: TIBStringField
      FieldName = 'CRC_CONTADOR'
      Origin = '"PROPRIEDADE"."CRC_CONTADOR"'
    end
    object dtEditCAFIR: TIBStringField
      FieldName = 'CAFIR'
      Origin = '"PROPRIEDADE"."CAFIR"'
    end
    object dtEditR_MAT: TIBStringField
      FieldName = 'R_MAT'
      Origin = '"PROPRIEDADE"."R_MAT"'
    end
    object dtEditINSC_ESTADUAL: TIBStringField
      FieldName = 'INSC_ESTADUAL'
      Origin = '"PROPRIEDADE"."INSC_ESTADUAL"'
    end
    object dtEditEXPORT_MIC: TIBStringField
      FieldName = 'EXPORT_MIC'
      Origin = '"PROPRIEDADE"."EXPORT_MIC"'
      FixedChar = True
      Size = 1
    end
    object dtEditCOND_PRODUTOR: TIntegerField
      FieldName = 'COND_PRODUTOR'
      Origin = '"PROPRIEDADE"."COND_PRODUTOR"'
    end
    object dtEditAREA_TOTAL: TFloatField
      FieldName = 'AREA_TOTAL'
      Origin = '"PROPRIEDADE"."AREA_TOTAL"'
      DisplayFormat = '###,##0.00'
    end
    object dtEditAREA_PASTAGEM: TFloatField
      FieldName = 'AREA_PASTAGEM'
      Origin = '"PROPRIEDADE"."AREA_PASTAGEM"'
      DisplayFormat = '###,##0.00'
    end
    object dtEditAREA_AGRICOLA: TFloatField
      FieldName = 'AREA_AGRICOLA'
      Origin = '"PROPRIEDADE"."AREA_AGRICOLA"'
      DisplayFormat = '###,##0.00'
    end
    object dtEditOUTRAS_AREAS: TFloatField
      FieldName = 'OUTRAS_AREAS'
      Origin = '"PROPRIEDADE"."OUTRAS_AREAS"'
      DisplayFormat = '###,##0.00'
    end
    object dtEditAREA_UTILIZADA: TFloatField
      FieldName = 'AREA_UTILIZADA'
      Origin = '"PROPRIEDADE"."AREA_UTILIZADA"'
      DisplayFormat = '###,##0.00'
    end
    object dtEditATIVO: TIBStringField
      FieldName = 'ATIVO'
      Origin = '"PROPRIEDADE"."ATIVO"'
      FixedChar = True
      Size = 1
    end
    object dtEditDOMICILIO_FISCAL: TIntegerField
      FieldName = 'DOMICILIO_FISCAL'
      Origin = '"PROPRIEDADE"."DOMICILIO_FISCAL"'
    end
    object dtEditGADO_PRECOCE: TIBStringField
      FieldName = 'GADO_PRECOCE'
      Origin = '"PROPRIEDADE"."GADO_PRECOCE"'
      FixedChar = True
      Size = 1
    end
    object dtEditGADO_REGISTRADO: TIBStringField
      FieldName = 'GADO_REGISTRADO'
      Origin = '"PROPRIEDADE"."GADO_REGISTRADO"'
      OnChange = dtEditGADO_REGISTRADOChange
      FixedChar = True
      Size = 1
    end
    object dtEditGADO_LEITEIRO: TIBStringField
      FieldName = 'GADO_LEITEIRO'
      Origin = '"PROPRIEDADE"."GADO_LEITEIRO"'
      OnChange = dtEditGADO_LEITEIROChange
      FixedChar = True
      Size = 1
    end
    object dtEditCAPACIDADE_ARMAZENAMENTO: TIBBCDField
      FieldName = 'CAPACIDADE_ARMAZENAMENTO'
      Origin = '"PROPRIEDADE"."CAPACIDADE_ARMAZENAMENTO"'
      Precision = 18
      Size = 2
    end
    object dtEditAGENFA: TIntegerField
      FieldName = 'AGENFA'
      Origin = '"PROPRIEDADE"."AGENFA"'
    end
    object dtEditMARCA: TBlobField
      FieldName = 'MARCA'
      Origin = '"PROPRIEDADE"."MARCA"'
      ProviderFlags = [pfInUpdate]
      Size = 8
    end
  end
  inherited dtList: TIBQuery
    SQL.Strings = (
      
        'select  p.nome p_nome, coalesce(cdd.nome,'#39#39')||'#39' - '#39'||coalesce(uf' +
        '.uf,'#39#39') cdd_nome, coalesce(dc.nome,'#39#39')||'#39' - '#39'||coalesce(dcuf.uf,' +
        #39#39') dc_nome,  pp.*'
      'from propriedade pp'
      'left join produtores p on (p.codigo = pp.produtor)'
      'left join cidades cdd on (pp.cidade = cdd.codigo)'
      'left join estados uf on (cdd.estado = uf.codigo)'
      'left join cidades dc on (pp.domicilio_fiscal = DC.codigo)'
      'left join estados dcuf on (dc.estado = dcuf.codigo)')
    Left = 224
    Top = 0
    object dtListP_NOME: TIBStringField
      DisplayLabel = 'Produtor'
      FieldName = 'P_NOME'
      Origin = '"PRODUTORES"."NOME"'
      Size = 50
    end
    object dtListCODIGO: TIntegerField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'CODIGO'
      Origin = '"PROPRIEDADE"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtListNOME: TIBStringField
      DisplayLabel = 'Nome'
      FieldName = 'NOME'
      Origin = '"PROPRIEDADE"."NOME"'
      Size = 50
    end
    object dtListCIDADE: TIntegerField
      DisplayLabel = 'C'#243'd. Cidade'
      FieldName = 'CIDADE'
      Origin = '"PROPRIEDADE"."CIDADE"'
    end
    object dtListPRODUTOR: TIntegerField
      DisplayLabel = 'C'#243'd. Produtor'
      FieldName = 'PRODUTOR'
      Origin = '"PROPRIEDADE"."PRODUTOR"'
    end
    object dtListCOMPLEMENTO: TIBStringField
      DisplayLabel = 'Endere'#231'o'
      FieldName = 'COMPLEMENTO'
      Origin = '"PROPRIEDADE"."COMPLEMENTO"'
      Size = 50
    end
    object dtListN_CPR: TIntegerField
      DisplayLabel = 'N'#186' CPR'
      FieldName = 'N_CPR'
      Origin = '"PROPRIEDADE"."N_CPR"'
    end
    object dtListINSC_IAGRO: TIBStringField
      DisplayLabel = 'Insc. IAGRO'
      FieldName = 'INSC_IAGRO'
      Origin = '"PROPRIEDADE"."INSC_IAGRO"'
    end
    object dtListINCRA: TIBStringField
      FieldName = 'INCRA'
      Origin = '"PROPRIEDADE"."INCRA"'
    end
    object dtListCRC_CONTADOR: TIBStringField
      DisplayLabel = 'CRC Contador'
      FieldName = 'CRC_CONTADOR'
      Origin = '"PROPRIEDADE"."CRC_CONTADOR"'
    end
    object dtListCAFIR: TIBStringField
      FieldName = 'CAFIR'
      Origin = '"PROPRIEDADE"."CAFIR"'
    end
    object dtListR_MAT: TIBStringField
      DisplayLabel = 'R. Mat'
      FieldName = 'R_MAT'
      Origin = '"PROPRIEDADE"."R_MAT"'
    end
    object dtListINSC_ESTADUAL: TIBStringField
      DisplayLabel = 'Insc. Estadual'
      FieldName = 'INSC_ESTADUAL'
      Origin = '"PROPRIEDADE"."INSC_ESTADUAL"'
    end
    object dtListEXPORT_MIC: TIBStringField
      DisplayLabel = 'Exporta'
      FieldName = 'EXPORT_MIC'
      Origin = '"PROPRIEDADE"."EXPORT_MIC"'
      FixedChar = True
      Size = 1
    end
    object dtListCOND_PRODUTOR: TIntegerField
      DisplayLabel = 'C'#243'd. Condi'#231#227'o Produtor'
      FieldName = 'COND_PRODUTOR'
      Origin = '"PROPRIEDADE"."COND_PRODUTOR"'
    end
    object dtListAREA_TOTAL: TFloatField
      DisplayLabel = 'Area Total'
      FieldName = 'AREA_TOTAL'
      Origin = '"PROPRIEDADE"."AREA_TOTAL"'
      DisplayFormat = '###,##0.00'
    end
    object dtListAREA_PASTAGEM: TFloatField
      DisplayLabel = 'Area Pastagem'
      FieldName = 'AREA_PASTAGEM'
      Origin = '"PROPRIEDADE"."AREA_PASTAGEM"'
      DisplayFormat = '###,##0.00'
    end
    object dtListAREA_AGRICOLA: TFloatField
      DisplayLabel = 'Area Agr'#237'cola'
      FieldName = 'AREA_AGRICOLA'
      Origin = '"PROPRIEDADE"."AREA_AGRICOLA"'
      DisplayFormat = '###,##0.00'
    end
    object dtListOUTRAS_AREAS: TFloatField
      DisplayLabel = 'Outras Areas'
      FieldName = 'OUTRAS_AREAS'
      Origin = '"PROPRIEDADE"."OUTRAS_AREAS"'
      DisplayFormat = '###,##0.00'
    end
    object dtListAREA_UTILIZADA: TFloatField
      DisplayLabel = 'Area Utilizada'
      FieldName = 'AREA_UTILIZADA'
      Origin = '"PROPRIEDADE"."AREA_UTILIZADA"'
      DisplayFormat = '###,##0.00'
    end
    object dtListATIVO: TIBStringField
      DisplayLabel = 'Ativo'
      FieldName = 'ATIVO'
      Origin = '"PROPRIEDADE"."ATIVO"'
      FixedChar = True
      Size = 1
    end
    object dtListDOMICILIO_FISCAL: TIntegerField
      DisplayLabel = 'C'#243'd. DC'
      FieldName = 'DOMICILIO_FISCAL'
      Origin = '"PROPRIEDADE"."DOMICILIO_FISCAL"'
    end
    object dtListCDD_NOME: TIBStringField
      FieldName = 'CDD_NOME'
      ProviderFlags = []
      Size = 55
    end
    object dtListDC_NOME: TIBStringField
      DisplayLabel = 'Dc. Nome'
      FieldName = 'DC_NOME'
      ProviderFlags = []
      Size = 55
    end
    object dtListGADO_PRECOCE: TIBStringField
      DisplayLabel = 'Gado Precoce'
      FieldName = 'GADO_PRECOCE'
      Origin = '"PROPRIEDADE"."GADO_PRECOCE"'
      FixedChar = True
      Size = 1
    end
    object dtListGADO_REGISTRADO: TIBStringField
      DisplayLabel = 'Gado Registrado'
      FieldName = 'GADO_REGISTRADO'
      Origin = '"PROPRIEDADE"."GADO_REGISTRADO"'
      FixedChar = True
      Size = 1
    end
    object dtListGADO_LEITEIRO: TIBStringField
      DisplayLabel = 'Gado Leiteiro'
      FieldName = 'GADO_LEITEIRO'
      Origin = '"PROPRIEDADE"."GADO_LEITEIRO"'
      FixedChar = True
      Size = 1
    end
    object dtListCAPACIDADE_ARMAZENAMENTO: TIBBCDField
      FieldName = 'CAPACIDADE_ARMAZENAMENTO'
      Origin = '"PROPRIEDADE"."CAPACIDADE_ARMAZENAMENTO"'
      Precision = 18
      Size = 2
    end
  end
  inherited dxBarManager: TdxBarManager
    Categories.ItemsVisibles = (
      2
      2)
    Categories.Visibles = (
      True
      True)
    Left = 394
    Top = 474
    DockControlHeights = (
      0
      0
      0
      26)
  end
  inherited ActionList1: TActionList
    Left = 410
    Top = 200
    inherited ActCadLookup: TAction
      OnExecute = ActCadLookupExecute
    end
  end
  inherited dsLink: TDataSource
    Left = 358
    Top = 0
  end
  inherited cxImageList1: TcxImageList
    FormatVersion = 1
    DesignInfo = 30999016
  end
  inherited dxBarDBNavigator1: TdxBarDBNavigator
    Left = 426
    Top = 474
  end
  inherited GridPopupMenu: TcxGridPopupMenu
    Left = 520
    Top = 473
  end
  inherited SaveDialog: TSaveDialog
    Left = 638
    Top = 471
  end
  inherited ACBrEnterTab1: TACBrEnterTab
    Left = 456
    Top = 473
  end
  inherited cxPropertiesStore: TcxPropertiesStore
    Components = <
      item
        Component = Grid
        Properties.Strings = (
          'Align'
          'Anchors'
          'BevelEdges'
          'BevelInner'
          'BevelKind'
          'BevelOuter'
          'BevelWidth'
          'BorderStyle'
          'BorderWidth'
          'Constraints'
          'Cursor'
          'DragCursor'
          'DragKind'
          'DragMode'
          'DragOpening'
          'DragOpeningWaitTime'
          'Enabled'
          'Font'
          'Height'
          'HelpContext'
          'HelpKeyword'
          'HelpType'
          'Hint'
          'Left'
          'LevelTabs'
          'LookAndFeel'
          'Name'
          'ParentFont'
          'PopupMenu'
          'RootLevelOptions'
          'RootLevelStyles'
          'TabOrder'
          'TabStop'
          'Tag'
          'Top'
          'Visible'
          'Width')
      end
      item
        Component = GridComp1
        Properties.Strings = (
          'Align'
          'Anchors'
          'BevelEdges'
          'BevelInner'
          'BevelKind'
          'BevelOuter'
          'BevelWidth'
          'BorderStyle'
          'BorderWidth'
          'Constraints'
          'Cursor'
          'DragCursor'
          'DragKind'
          'DragMode'
          'DragOpening'
          'DragOpeningWaitTime'
          'Enabled'
          'Font'
          'Height'
          'HelpContext'
          'HelpKeyword'
          'HelpType'
          'Hint'
          'Left'
          'LevelTabs'
          'LookAndFeel'
          'Name'
          'ParentFont'
          'PopupMenu'
          'RootLevelOptions'
          'RootLevelStyles'
          'TabOrder'
          'TabStop'
          'Tag'
          'Top'
          'Visible'
          'Width')
      end
      item
        Component = GridComp1DBTableView1
        Properties.Strings = (
          'BackgroundBitmaps'
          'DataController'
          'DateTimeHandling'
          'DragMode'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FilterBox'
          'Filtering'
          'FilterRow'
          'Name'
          'NavigatorButtons'
          'NewItemRow'
          'OptionsBehavior'
          'OptionsCustomize'
          'OptionsData'
          'OptionsSelection'
          'OptionsView'
          'PopupMenu'
          'Preview'
          'Styles'
          'Synchronization'
          'Tag')
      end
      item
        Component = GridComp1DBTableView1ANO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp1DBTableView1CODIGO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp1DBTableView1PRODUTO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp1DBTableView1PRODUTO_NOME
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp1DBTableView1PROPRIEDADE
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp1DBTableView1QTDE
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp1Level1
        Properties.Strings = (
          'Caption'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'GridView'
          'ImageIndex'
          'MaxDetailHeight'
          'Name'
          'Options'
          'Styles'
          'Tag'
          'Visible')
      end
      item
        Component = GridComp2
        Properties.Strings = (
          'Align'
          'Anchors'
          'BevelEdges'
          'BevelInner'
          'BevelKind'
          'BevelOuter'
          'BevelWidth'
          'BorderStyle'
          'BorderWidth'
          'Constraints'
          'Cursor'
          'DragCursor'
          'DragKind'
          'DragMode'
          'DragOpening'
          'DragOpeningWaitTime'
          'Enabled'
          'Font'
          'Height'
          'HelpContext'
          'HelpKeyword'
          'HelpType'
          'Hint'
          'Left'
          'LevelTabs'
          'LookAndFeel'
          'Name'
          'ParentFont'
          'PopupMenu'
          'RootLevelOptions'
          'RootLevelStyles'
          'TabOrder'
          'TabStop'
          'Tag'
          'Top'
          'Visible'
          'Width')
      end
      item
        Component = GridComp2DBTableView1
        Properties.Strings = (
          'BackgroundBitmaps'
          'DataController'
          'DateTimeHandling'
          'DragMode'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FilterBox'
          'Filtering'
          'FilterRow'
          'Name'
          'NavigatorButtons'
          'NewItemRow'
          'OptionsBehavior'
          'OptionsCustomize'
          'OptionsData'
          'OptionsSelection'
          'OptionsView'
          'PopupMenu'
          'Preview'
          'Styles'
          'Synchronization'
          'Tag')
      end
      item
        Component = GridComp2DBTableView1ANO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp2DBTableView1CODIGO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp2DBTableView1PROPRIEDADE
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp2DBTableView1QTDE_LEITE_COMERCIALIZADO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp2DBTableView1QTDE_VACAS
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridComp2Level1
        Properties.Strings = (
          'Caption'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'GridView'
          'ImageIndex'
          'MaxDetailHeight'
          'Name'
          'Options'
          'Styles'
          'Tag'
          'Visible')
      end
      item
        Component = GridDBBandedTableView1
        Properties.Strings = (
          'BackgroundBitmaps'
          'Bands'
          'DataController'
          'DateTimeHandling'
          'DragMode'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FilterBox'
          'Filtering'
          'FilterRow'
          'Name'
          'NavigatorButtons'
          'NewItemRow'
          'OptionsBehavior'
          'OptionsCustomize'
          'OptionsData'
          'OptionsSelection'
          'OptionsView'
          'PopupMenu'
          'Preview'
          'Styles'
          'Synchronization'
          'Tag')
      end
      item
        Component = GridDBBandedTableView2
        Properties.Strings = (
          'BackgroundBitmaps'
          'Bands'
          'DataController'
          'DateTimeHandling'
          'DragMode'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FilterBox'
          'Filtering'
          'FilterRow'
          'Name'
          'NavigatorButtons'
          'NewItemRow'
          'OptionsBehavior'
          'OptionsCustomize'
          'OptionsData'
          'OptionsSelection'
          'OptionsView'
          'PopupMenu'
          'Preview'
          'Styles'
          'Synchronization'
          'Tag')
      end
      item
        Component = GridDBBandedTableView2AREA_AGRICOLA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2AREA_PASTAGEM
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2AREA_TOTAL
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2AREA_UTILIZADA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2ATIVO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2CAFIR
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2CAPACIDADE_ARMAZENAMENTO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2CDD_NOME
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2CIDADE
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2CODIGO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2COMPLEMENTO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2COND_PRODUTOR
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2CRC_CONTADOR
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2DC_NOME
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2DOMICILIO_FISCAL
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2EXPORT_MIC
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2GADO_LEITEIRO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2GADO_PRECOCE
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2GADO_REGISTRADO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2INCRA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2INSC_ESTADUAL
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2INSC_IAGRO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2N_CPR
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2NOME
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2OUTRAS_AREAS
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2P_NOME
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2PRODUTOR
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2R_MAT
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBBandedTableView2TIPO_LOGRADOURO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Position'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end>
    Left = 426
    Top = 0
  end
  inherited cxIntl1: TcxIntl
    Left = 392
    Top = 0
  end
  object dsProdutores: TDataSource
    DataSet = lstProdutores
    Left = 662
  end
  object lstProdutores: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      'select p.codigo, p.nome from produtores p'
      'where p.produtor = '#39'S'#39' and p.ativo = '#39'S'#39
      '')
    Left = 527
    object lstProdutoresCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"PRODUTORES"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstProdutoresNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"PRODUTORES"."NOME"'
      Size = 50
    end
  end
  object lstCidades: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      'select cdd.*, uf.uf from cidades cdd'
      'left join estados uf on (cdd.estado = uf.codigo)')
    Left = 493
    object lstCidadesCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"CIDADES"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstCidadesNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"CIDADES"."NOME"'
      Size = 50
    end
    object lstCidadesCOD_IBGE: TIBStringField
      FieldName = 'COD_IBGE'
      Origin = '"CIDADES"."COD_IBGE"'
      Size = 10
    end
    object lstCidadesCOD_IAGRO: TIBStringField
      FieldName = 'COD_IAGRO'
      Origin = '"CIDADES"."COD_IAGRO"'
      Size = 10
    end
    object lstCidadesCOD_SEFAZ: TIBStringField
      FieldName = 'COD_SEFAZ'
      Origin = '"CIDADES"."COD_SEFAZ"'
      Size = 10
    end
    object lstCidadesESTADO: TIntegerField
      FieldName = 'ESTADO'
      Origin = '"CIDADES"."ESTADO"'
    end
    object lstCidadesCEP_PADRAO: TIBStringField
      FieldName = 'CEP_PADRAO'
      Origin = '"CIDADES"."CEP_PADRAO"'
    end
    object lstCidadesUF_TEMP: TIBStringField
      FieldName = 'UF_TEMP'
      Origin = '"CIDADES"."UF_TEMP"'
      FixedChar = True
      Size = 2
    end
    object lstCidadesUF: TIBStringField
      FieldName = 'UF'
      Origin = '"ESTADOS"."UF"'
      FixedChar = True
      Size = 2
    end
  end
  object dsCidades: TDataSource
    DataSet = lstCidades
    Left = 628
  end
  object dsCondPropriedade: TDataSource
    DataSet = lstCondPropriedade
    Left = 696
  end
  object lstCondPropriedade: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      'select * from CONDICOES_PROPRIEDADE')
    Left = 561
    object lstCondPropriedadeCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"CONDICOES_PROPRIEDADE"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstCondPropriedadeNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"CONDICOES_PROPRIEDADE"."NOME"'
      Size = 50
    end
  end
  object dsDcFiscal: TDataSource
    DataSet = lstdcFiscal
    Left = 594
  end
  object lstdcFiscal: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      'select cdd.*, uf.uf from cidades cdd'
      'left join estados uf on (cdd.estado = uf.codigo)')
    Left = 460
    object lstdcFiscalCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"CIDADES"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstdcFiscalNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"CIDADES"."NOME"'
      Size = 50
    end
    object lstdcFiscalCOD_IBGE: TIBStringField
      FieldName = 'COD_IBGE'
      Origin = '"CIDADES"."COD_IBGE"'
      Size = 10
    end
    object lstdcFiscalCOD_IAGRO: TIBStringField
      FieldName = 'COD_IAGRO'
      Origin = '"CIDADES"."COD_IAGRO"'
      Size = 10
    end
    object lstdcFiscalCOD_SEFAZ: TIBStringField
      FieldName = 'COD_SEFAZ'
      Origin = '"CIDADES"."COD_SEFAZ"'
      Size = 10
    end
    object lstdcFiscalESTADO: TIntegerField
      FieldName = 'ESTADO'
      Origin = '"CIDADES"."ESTADO"'
    end
    object lstdcFiscalCEP_PADRAO: TIBStringField
      FieldName = 'CEP_PADRAO'
      Origin = '"CIDADES"."CEP_PADRAO"'
    end
    object lstdcFiscalUF_TEMP: TIBStringField
      FieldName = 'UF_TEMP'
      Origin = '"CIDADES"."UF_TEMP"'
      FixedChar = True
      Size = 2
    end
    object lstdcFiscalUF: TIBStringField
      FieldName = 'UF'
      Origin = '"ESTADOS"."UF"'
      FixedChar = True
      Size = 2
    end
  end
  object dsRegistroComp1: TDataSource
    DataSet = dtComp1Itens
    Left = 384
    Top = 616
  end
  object dsPesquisaComp1: TDataSource
    DataSet = dtListComp1Itens
    Left = 352
    Top = 616
  end
  object dtListComp1Itens: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    DataSource = dsRegistro
    SQL.Strings = (
      
        'select est.*, prd.nome produto_nome from PRODUTO_SALDO_INICIAL e' +
        'st'
      'left join produtos prd on (prd.codigo = est.produto)'
      'where est.propriedade = :codigo')
    Left = 352
    Top = 584
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'codigo'
        ParamType = ptUnknown
      end>
    object dtListComp1ItensCODIGO: TIntegerField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'CODIGO'
      Origin = '"PRODUTO_SALDO_INICIAL"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtListComp1ItensANO: TIntegerField
      DisplayLabel = 'Ano Base'
      FieldName = 'ANO'
      Origin = '"PRODUTO_SALDO_INICIAL"."ANO"'
    end
    object dtListComp1ItensPRODUTO: TIntegerField
      DisplayLabel = 'C'#243'd. Produto'
      FieldName = 'PRODUTO'
      Origin = '"PRODUTO_SALDO_INICIAL"."PRODUTO"'
    end
    object dtListComp1ItensPROPRIEDADE: TIntegerField
      DisplayLabel = 'C'#243'd. Propriedade'
      FieldName = 'PROPRIEDADE'
      Origin = '"PRODUTO_SALDO_INICIAL"."PROPRIEDADE"'
    end
    object dtListComp1ItensQTDE: TIBBCDField
      DisplayLabel = 'Qtde'
      FieldName = 'QTDE'
      Origin = '"PRODUTO_SALDO_INICIAL"."QTDE"'
      DisplayFormat = '###,##0.00'
      Precision = 18
      Size = 2
    end
    object dtListComp1ItensPRODUTO_NOME: TIBStringField
      DisplayLabel = 'Produto'
      FieldName = 'PRODUTO_NOME'
      Origin = '"PRODUTOS"."NOME"'
      Size = 50
    end
  end
  object dtComp1Itens: TIBDataSet
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    BeforeInsert = dtComp1ItensBeforeInsert
    BeforePost = dtComp1ItensBeforePost
    DeleteSQL.Strings = (
      'delete from PRODUTO_SALDO_INICIAL'
      'where'
      '  CODIGO = :OLD_CODIGO')
    InsertSQL.Strings = (
      'insert into PRODUTO_SALDO_INICIAL'
      '  (ANO, CODIGO, PRODUTO, PROPRIEDADE, QTDE)'
      'values'
      '  (:ANO, :CODIGO, :PRODUTO, :PROPRIEDADE, :QTDE)')
    RefreshSQL.Strings = (
      'Select '
      '  CODIGO,'
      '  ANO,'
      '  PRODUTO,'
      '  PROPRIEDADE,'
      '  QTDE'
      'from PRODUTO_SALDO_INICIAL '
      'where'
      '  CODIGO = :CODIGO')
    SelectSQL.Strings = (
      'select est.* from PRODUTO_SALDO_INICIAL est'
      'where est.codigo = :codigo')
    ModifySQL.Strings = (
      'update PRODUTO_SALDO_INICIAL'
      'set'
      '  ANO = :ANO,'
      '  CODIGO = :CODIGO,'
      '  PRODUTO = :PRODUTO,'
      '  PROPRIEDADE = :PROPRIEDADE,'
      '  QTDE = :QTDE'
      'where'
      '  CODIGO = :OLD_CODIGO')
    GeneratorField.Field = 'CODIGO'
    GeneratorField.Generator = 'GEN_PRODUTO_SALDO_INICIAL_ID'
    GeneratorField.ApplyEvent = gamOnPost
    DataSource = dsLinkComp1
    Left = 384
    Top = 584
    object dtComp1ItensCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"PRODUTO_SALDO_INICIAL"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtComp1ItensANO: TIntegerField
      FieldName = 'ANO'
      Origin = '"PRODUTO_SALDO_INICIAL"."ANO"'
    end
    object dtComp1ItensPRODUTO: TIntegerField
      FieldName = 'PRODUTO'
      Origin = '"PRODUTO_SALDO_INICIAL"."PRODUTO"'
    end
    object dtComp1ItensPROPRIEDADE: TIntegerField
      FieldName = 'PROPRIEDADE'
      Origin = '"PRODUTO_SALDO_INICIAL"."PROPRIEDADE"'
    end
    object dtComp1ItensQTDE: TIBBCDField
      FieldName = 'QTDE'
      Origin = '"PRODUTO_SALDO_INICIAL"."QTDE"'
      DisplayFormat = '###,##0.00'
      Precision = 18
      Size = 2
    end
  end
  object dtListComp2Itens: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    DataSource = dsRegistro
    SQL.Strings = (
      'select * from vacas_leiteira v'
      'where v.propriedade = :codigo')
    Left = 424
    Top = 584
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'codigo'
        ParamType = ptUnknown
      end>
    object dtListComp2ItensCODIGO: TIntegerField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'CODIGO'
      Origin = '"VACAS_LEITEIRA"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtListComp2ItensANO: TIntegerField
      DisplayLabel = 'Ano Base'
      FieldName = 'ANO'
      Origin = '"VACAS_LEITEIRA"."ANO"'
    end
    object dtListComp2ItensQTDE_VACAS: TIBBCDField
      DisplayLabel = 'Qtde Vacas'
      FieldName = 'QTDE_VACAS'
      Origin = '"VACAS_LEITEIRA"."QTDE_VACAS"'
      Precision = 18
      Size = 2
    end
    object dtListComp2ItensQTDE_LEITE_COMERCIALIZADO: TIBBCDField
      DisplayLabel = 'Qtde Leite Comercializado'
      FieldName = 'QTDE_LEITE_COMERCIALIZADO'
      Origin = '"VACAS_LEITEIRA"."QTDE_LEITE_COMERCIALIZADO"'
      Precision = 18
      Size = 2
    end
    object dtListComp2ItensPROPRIEDADE: TIntegerField
      DisplayLabel = 'C'#243'd. Propriedade'
      FieldName = 'PROPRIEDADE'
      Origin = '"VACAS_LEITEIRA"."PROPRIEDADE"'
    end
  end
  object dsPesquisaComp2: TDataSource
    DataSet = dtListComp2Itens
    Left = 424
    Top = 616
  end
  object dsRegistroComp2: TDataSource
    DataSet = dtComp2Itens
    Left = 456
    Top = 616
  end
  object dtComp2Itens: TIBDataSet
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    BeforeInsert = dtComp1ItensBeforeInsert
    BeforePost = dtComp2ItensBeforePost
    DeleteSQL.Strings = (
      'delete from vacas_leiteira'
      'where'
      '  CODIGO = :OLD_CODIGO')
    InsertSQL.Strings = (
      'insert into vacas_leiteira'
      
        '  (ANO, CODIGO, PROPRIEDADE, QTDE_LEITE_COMERCIALIZADO, QTDE_VAC' +
        'AS)'
      'values'
      
        '  (:ANO, :CODIGO, :PROPRIEDADE, :QTDE_LEITE_COMERCIALIZADO, :QTD' +
        'E_VACAS)')
    RefreshSQL.Strings = (
      'Select * '
      'from vacas_leiteira '
      'where'
      '  CODIGO = :CODIGO')
    SelectSQL.Strings = (
      'select * from vacas_leiteira v'
      'where v.codigo = :codigo')
    ModifySQL.Strings = (
      'update vacas_leiteira'
      'set'
      '  ANO = :ANO,'
      '  CODIGO = :CODIGO,'
      '  PROPRIEDADE = :PROPRIEDADE,'
      '  QTDE_LEITE_COMERCIALIZADO = :QTDE_LEITE_COMERCIALIZADO,'
      '  QTDE_VACAS = :QTDE_VACAS'
      'where'
      '  CODIGO = :OLD_CODIGO')
    GeneratorField.Field = 'CODIGO'
    GeneratorField.Generator = 'GEN_VACAS_LEITEIRA_ID'
    GeneratorField.ApplyEvent = gamOnPost
    DataSource = dsLinkComp2
    Left = 456
    Top = 584
    object dtComp2ItensCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"VACAS_LEITEIRA"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtComp2ItensANO: TIntegerField
      FieldName = 'ANO'
      Origin = '"VACAS_LEITEIRA"."ANO"'
    end
    object dtComp2ItensQTDE_VACAS: TIBBCDField
      FieldName = 'QTDE_VACAS'
      Origin = '"VACAS_LEITEIRA"."QTDE_VACAS"'
      Precision = 18
      Size = 2
    end
    object dtComp2ItensQTDE_LEITE_COMERCIALIZADO: TIBBCDField
      FieldName = 'QTDE_LEITE_COMERCIALIZADO'
      Origin = '"VACAS_LEITEIRA"."QTDE_LEITE_COMERCIALIZADO"'
      Precision = 18
      Size = 2
    end
    object dtComp2ItensPROPRIEDADE: TIntegerField
      FieldName = 'PROPRIEDADE'
      Origin = '"VACAS_LEITEIRA"."PROPRIEDADE"'
    end
  end
  object dsLinkComp2: TDataSource
    DataSet = dtListComp2Itens
    Left = 440
    Top = 548
  end
  object dsLinkComp1: TDataSource
    DataSet = dtListComp1Itens
    Left = 368
    Top = 548
  end
  object dsProdutos: TDataSource
    DataSet = lstProdutos
    Left = 608
    Top = 600
  end
  object lstProdutos: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      'select * from produtos p'
      'where ((p.tipo = '#39'A'#39') or (ordem_dap_pec is not null'
      ')) and coalesce(p.ativo,'#39'S'#39') = '#39'S'#39)
    Left = 608
    Top = 570
    object lstProdutosCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"PRODUTOS"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstProdutosNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"PRODUTOS"."NOME"'
      Size = 50
    end
    object lstProdutosGRUPO: TIntegerField
      FieldName = 'GRUPO'
      Origin = '"PRODUTOS"."GRUPO"'
    end
    object lstProdutosUNIDADE: TIntegerField
      FieldName = 'UNIDADE'
      Origin = '"PRODUTOS"."UNIDADE"'
    end
    object lstProdutosVALOR: TFloatField
      FieldName = 'VALOR'
      Origin = '"PRODUTOS"."VALOR"'
    end
    object lstProdutosATIVO: TIBStringField
      FieldName = 'ATIVO'
      Origin = '"PRODUTOS"."ATIVO"'
      FixedChar = True
      Size = 1
    end
    object lstProdutosTIPO: TIBStringField
      FieldName = 'TIPO'
      Origin = '"PRODUTOS"."TIPO"'
      FixedChar = True
      Size = 1
    end
    object lstProdutosEXPORTA_DAP: TIBStringField
      FieldName = 'EXPORTA_DAP'
      Origin = '"PRODUTOS"."EXPORTA_DAP"'
      FixedChar = True
      Size = 1
    end
    object lstProdutosINSUMOS: TIBStringField
      FieldName = 'INSUMOS'
      Origin = '"PRODUTOS"."INSUMOS"'
      FixedChar = True
      Size = 1
    end
    object lstProdutosTIPO_INSUMO: TIBStringField
      FieldName = 'TIPO_INSUMO'
      Origin = '"PRODUTOS"."TIPO_INSUMO"'
      FixedChar = True
      Size = 1
    end
    object lstProdutosORDEM_DAP_PEC: TIntegerField
      FieldName = 'ORDEM_DAP_PEC'
      Origin = '"PRODUTOS"."ORDEM_DAP_PEC"'
    end
    object lstProdutosOUTROS_ANIMAIS: TIBStringField
      FieldName = 'OUTROS_ANIMAIS'
      Origin = '"PRODUTOS"."OUTROS_ANIMAIS"'
      FixedChar = True
      Size = 1
    end
  end
  object dtComp3Itens: TIBDataSet
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    BeforeInsert = dtComp1ItensBeforeInsert
    BeforePost = dtComp3ItensBeforePost
    DeleteSQL.Strings = (
      'delete from gado_registrado'
      'where'
      '  CODIGO = :OLD_CODIGO')
    InsertSQL.Strings = (
      'insert into gado_registrado'
      '  (ANO, CODIGO, PRODUTO, PROPRIEDADE, QTDE)'
      'values'
      '  (:ANO, :CODIGO, :PRODUTO, :PROPRIEDADE, :QTDE)')
    RefreshSQL.Strings = (
      'Select * '
      'from gado_registrado '
      'where'
      '  CODIGO = :CODIGO')
    SelectSQL.Strings = (
      'select * from gado_registrado g'
      'where g.codigo = :codigo')
    ModifySQL.Strings = (
      'update gado_registrado'
      'set'
      '  ANO = :ANO,'
      '  CODIGO = :CODIGO,'
      '  PRODUTO = :PRODUTO,'
      '  PROPRIEDADE = :PROPRIEDADE,'
      '  QTDE = :QTDE'
      'where'
      '  CODIGO = :OLD_CODIGO')
    GeneratorField.Field = 'CODIGO'
    GeneratorField.Generator = 'GEN_GADO_REGISTRADO_ID'
    GeneratorField.ApplyEvent = gamOnPost
    DataSource = dsLinkComp3
    Left = 528
    Top = 584
    object dtComp3ItensCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"GADO_REGISTRADO"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtComp3ItensANO: TIntegerField
      FieldName = 'ANO'
      Origin = '"GADO_REGISTRADO"."ANO"'
    end
    object dtComp3ItensQTDE: TIBBCDField
      FieldName = 'QTDE'
      Origin = '"GADO_REGISTRADO"."QTDE"'
      Precision = 18
      Size = 2
    end
    object dtComp3ItensPRODUTO: TIntegerField
      FieldName = 'PRODUTO'
      Origin = '"GADO_REGISTRADO"."PRODUTO"'
    end
    object dtComp3ItensPROPRIEDADE: TIntegerField
      FieldName = 'PROPRIEDADE'
      Origin = '"GADO_REGISTRADO"."PROPRIEDADE"'
    end
  end
  object dtListComp3Itens: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    DataSource = dsRegistro
    SQL.Strings = (
      'select g.*, p.nome nome_produto from gado_registrado g'
      'inner join produtos p on (p.codigo = g.produto)'
      'where g.propriedade = :codigo')
    Left = 496
    Top = 584
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'codigo'
        ParamType = ptUnknown
      end>
    object dtListComp3ItensCODIGO: TIntegerField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'CODIGO'
      Origin = '"GADO_REGISTRADO"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtListComp3ItensANO: TIntegerField
      DisplayLabel = 'Ano Base'
      FieldName = 'ANO'
      Origin = '"GADO_REGISTRADO"."ANO"'
    end
    object dtListComp3ItensQTDE: TIBBCDField
      DisplayLabel = 'Qtde'
      FieldName = 'QTDE'
      Origin = '"GADO_REGISTRADO"."QTDE"'
      Precision = 18
      Size = 2
    end
    object dtListComp3ItensPRODUTO: TIntegerField
      DisplayLabel = 'C'#243'd. Produto'
      FieldName = 'PRODUTO'
      Origin = '"GADO_REGISTRADO"."PRODUTO"'
    end
    object dtListComp3ItensPROPRIEDADE: TIntegerField
      DisplayLabel = 'C'#243'd. Propriedade'
      FieldName = 'PROPRIEDADE'
      Origin = '"GADO_REGISTRADO"."PROPRIEDADE"'
    end
    object dtListComp3ItensNOME_PRODUTO: TIBStringField
      DisplayLabel = 'Produto'
      FieldName = 'NOME_PRODUTO'
      Origin = '"PRODUTOS"."NOME"'
      Size = 50
    end
  end
  object dsLinkComp3: TDataSource
    DataSet = dtListComp3Itens
    Left = 512
    Top = 548
  end
  object dsPesquisaComp3: TDataSource
    DataSet = dtListComp3Itens
    Left = 496
    Top = 616
  end
  object dsRegistroComp3: TDataSource
    DataSet = dtComp3Itens
    Left = 528
    Top = 616
  end
  object lstProdutos2: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      'select * from produtos p'
      'where p.tipo = '#39'P'#39' and coalesce(p.ativo,'#39'S'#39') = '#39'S'#39)
    Left = 648
    Top = 570
    object lstProdutos2CODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"PRODUTOS"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstProdutos2NOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"PRODUTOS"."NOME"'
      Size = 50
    end
    object lstProdutos2GRUPO: TIntegerField
      FieldName = 'GRUPO'
      Origin = '"PRODUTOS"."GRUPO"'
    end
    object lstProdutos2UNIDADE: TIntegerField
      FieldName = 'UNIDADE'
      Origin = '"PRODUTOS"."UNIDADE"'
    end
    object lstProdutos2VALOR: TFloatField
      FieldName = 'VALOR'
      Origin = '"PRODUTOS"."VALOR"'
    end
    object lstProdutos2ATIVO: TIBStringField
      FieldName = 'ATIVO'
      Origin = '"PRODUTOS"."ATIVO"'
      FixedChar = True
      Size = 1
    end
    object lstProdutos2TIPO: TIBStringField
      FieldName = 'TIPO'
      Origin = '"PRODUTOS"."TIPO"'
      FixedChar = True
      Size = 1
    end
    object lstProdutos2EXPORTA_DAP: TIBStringField
      FieldName = 'EXPORTA_DAP'
      Origin = '"PRODUTOS"."EXPORTA_DAP"'
      FixedChar = True
      Size = 1
    end
    object lstProdutos2INSUMOS: TIBStringField
      FieldName = 'INSUMOS'
      Origin = '"PRODUTOS"."INSUMOS"'
      FixedChar = True
      Size = 1
    end
    object lstProdutos2TIPO_INSUMO: TIBStringField
      FieldName = 'TIPO_INSUMO'
      Origin = '"PRODUTOS"."TIPO_INSUMO"'
      FixedChar = True
      Size = 1
    end
    object lstProdutos2ORDEM_DAP_PEC: TIntegerField
      FieldName = 'ORDEM_DAP_PEC'
      Origin = '"PRODUTOS"."ORDEM_DAP_PEC"'
    end
    object lstProdutos2OUTROS_ANIMAIS: TIBStringField
      FieldName = 'OUTROS_ANIMAIS'
      Origin = '"PRODUTOS"."OUTROS_ANIMAIS"'
      FixedChar = True
      Size = 1
    end
  end
  object dsProdutos2: TDataSource
    DataSet = lstProdutos2
    Left = 648
    Top = 600
  end
  object GridPopMenuSub: TcxGridPopupMenu
    Grid = Grid
    PopupMenus = <
      item
        HitTypes = [gvhtCell, gvhtRecord, gvhtRowIndicator]
        Index = 0
      end>
    Left = 96
    Top = 417
  end
  object lstAgenfas: TIBQuery
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      'select * from AGENFAS')
    Left = 688
    Top = 570
    object lstAgenfasCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"AGENFAS"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstAgenfasCOD_SEFAZ: TIBStringField
      FieldName = 'COD_SEFAZ'
      Origin = '"AGENFAS"."COD_SEFAZ"'
      Size = 10
    end
    object lstAgenfasDESCRICAO: TIBStringField
      FieldName = 'DESCRICAO'
      Origin = '"AGENFAS"."DESCRICAO"'
      Size = 50
    end
    object lstAgenfasFONE: TIBStringField
      FieldName = 'FONE'
      Origin = '"AGENFAS"."FONE"'
      Size = 50
    end
  end
  object dsAgenfas: TDataSource
    DataSet = lstAgenfas
    Left = 688
    Top = 600
  end
end
